home *** CD-ROM | disk | FTP | other *** search
/ 220 Jogos / 220 jogos.iso / tabuleiro / xadrez3 / COMMENT.AWK < prev    next >
Encoding:
AWK Script  |  2002-02-01  |  841 b   |  43 lines
  1. #! /usr/bin/awk -f
  2. #
  3. # Preprocessor for chess games that are formatted as blocks of moves
  4. #  interspersed with blocks of text, separated by blank lines.  Finds
  5. #  the blocks of text and encloses them with "{ }" brackets so that
  6. #  xboard's game parser can identify them as comments.  Many games are
  7. #  posted to rec.games.chess in this format.
  8. #
  9. # Limitation:  Fails if a text block starts with a numbered move.  In
  10. #  that case you'll have to hand-edit the output.
  11. #
  12. BEGIN {
  13.     inmoves = 0;
  14.     blankline = 1;
  15. }
  16.  
  17. {
  18.     if (NF == 0) {
  19.     blankline = 1;
  20.     } else if (blankline) {
  21.     blankline = 0;
  22.     if ($1 ~ /^[0-9]+/) {
  23.         if (!inmoves) {
  24.         inmoves = 1;
  25.         print "}";
  26.         } else {
  27.         print "";
  28.         }
  29.     } else {
  30.         if (inmoves) {
  31.         inmoves = 0;
  32.         print "{";
  33.         } else {
  34.         print "}{";
  35.         }
  36.     }
  37.     print $0;
  38.     } else {
  39.     print $0;
  40.     }
  41. }
  42.  
  43.